home *** CD-ROM | disk | FTP | other *** search
/ PC Format (UK) 86 / PC_Format_September1998_Issue86.iso / Critical / CMiFree / tutor.dxr / 00001_Main Movie Scripts.ls next >
Encoding:
Text File  |  1998-07-13  |  12.1 KB  |  199 lines
  1. on startMovie
  2.   if the colorDepth <> 16 then
  3.     set the colorDepth to 16
  4.   end if
  5.   set the text of field "StageText" to "--"
  6. end
  7.  
  8. on tutorRoll
  9.   if rollOver(14) then
  10.     set the visible of sprite 2 to 1
  11.     set the visible of sprite 3 to 0
  12.     set the visible of sprite 4 to 0
  13.   else
  14.     if rollOver(15) then
  15.       set the visible of sprite 2 to 0
  16.       set the visible of sprite 3 to 1
  17.       set the visible of sprite 4 to 0
  18.     else
  19.       if rollOver(16) then
  20.         set the visible of sprite 2 to 0
  21.         set the visible of sprite 3 to 0
  22.         set the visible of sprite 4 to 1
  23.       else
  24.         set the visible of sprite 2 to 0
  25.         set the visible of sprite 3 to 0
  26.         set the visible of sprite 4 to 0
  27.       end if
  28.     end if
  29.   end if
  30.   if sprite 19 within 12 then
  31.     set the text of member "StageText" to "--"
  32.     updateStage()
  33.   else
  34.     if sprite 20 within 12 then
  35.       if not soundBusy(1) then
  36.         puppetSound(1, "TutorSound1")
  37.       end if
  38.       set the text of member "StageText" to "Create an audio part for the drums. Name it and set the audio channel to 1. Place the locators at bars 2 and 3. Press Ctrl P (Apple P on a Mac) to create the part."
  39.       updateStage()
  40.     else
  41.       if sprite 21 within 12 then
  42.         if not soundBusy(1) then
  43.           puppetSound(1, "TutorSound1")
  44.         end if
  45.         set the text of member "StageText" to "Double-click on the part to open the audio editor, select the Pencil. Click beat 1 to import samples. Select 909kick.aif. Hold Alt and drag the sample to beats 2, 3 and 4."
  46.         updateStage()
  47.       else
  48.         if sprite 22 within 12 then
  49.           if not soundBusy(1) then
  50.             puppetSound(1, "TutorSound1")
  51.           end if
  52.           set the text of member "StageText" to "Copy the kick pattern seven times to create an 8-bar sequence (press Alt with the Pencil tool to extend the part). To view the audio, select the Name/Wave in Options Menu."
  53.           updateStage()
  54.         else
  55.           if sprite 23 within 12 then
  56.             if not soundBusy(1) then
  57.               puppetSound(1, "TutorSound2")
  58.             end if
  59.             set the text of member "StageText" to "The second audio track is the main drum loop. This is a one bar mono sample at 120bpm. Repeat steps 1 and 2 and import loop1.aif. Again, copy the loop seven times."
  60.             updateStage()
  61.           else
  62.             if sprite 24 within 12 then
  63.               if not soundBusy(1) then
  64.                 puppetSound(1, "TutorSound3")
  65.               end if
  66.               set the text of member "StageText" to "(Files to load - Ride.prt) Using the GM drum kit on channel 10, record semi-quaver ride cymbals over the sequence. Make it more interesting by trying out other rides."
  67.               updateStage()
  68.             else
  69.               if sprite 25 within 12 then
  70.                 if not soundBusy(1) then
  71.                   puppetSound(1, "TutorSound3")
  72.                 end if
  73.                 set the text of member "StageText" to "Open Key edit and apply a medium shuffle (Groove Quantise menu). Home in on a bar that you like the sound of. Accenting notes can give the part a different feel."
  74.                 updateStage()
  75.               else
  76.                 if sprite 26 within 12 then
  77.                   if not soundBusy(1) then
  78.                     puppetSound(1, "TutorSound3")
  79.                   end if
  80.                   set the text of member "StageText" to "Use the Scissors tool to cut out the bar you have been working on. Use the Eraser tool to bin the excess and repeat the wanted section over the eight bar sequence."
  81.                   updateStage()
  82.                 else
  83.                   if sprite 27 within 12 then
  84.                     if not soundBusy(1) then
  85.                       puppetSound(1, "TutorSound4")
  86.                     end if
  87.                     set the text of member "StageText" to "(Files to load - hats.prt) Select channel 10 on a new track and record a simple hi-hat pattern. Apply the same shuffle feel and copy the part for the eight bars."
  88.                     updateStage()
  89.                   else
  90.                     if sprite 28 within 12 then
  91.                       if not soundBusy(1) then
  92.                         puppetSound(1, "TutorSound4")
  93.                       end if
  94.                       set the text of member "StageText" to "(Files to load - bass1.prt) Set up MIDI channel 2 for the bass. Using Program Change in the Inspector Bar, select patch 34 and play the part or load it from the CD ROM."
  95.                       updateStage()
  96.                     else
  97.                       if sprite 29 within 12 then
  98.                         if not soundBusy(1) then
  99.                           puppetSound(1, "TutorSound4")
  100.                         end if
  101.                         set the text of member "StageText" to "(Files to load - setup1.prt) In the first issue of Computer Music we'll explore more VST functions as we gradually build the song."
  102.                         updateStage()
  103.                       else
  104.                         if sprite 30 within 12 then
  105.                           set the text of member "StageText" to "Every issue of Computer Music will carry a full 25 stage walkthrough in essential software for making great music on your computer. The first issue's on UK sale from 3/9/98."
  106.                           updateStage()
  107.                         else
  108.                           if sprite 31 within 12 then
  109.                             set the text of member "StageText" to "Every issue of Computer Music will carry a full 25 stage walkthrough in essential software for making great music on your computer. The first issue's on UK sale from 3/9/98."
  110.                             updateStage()
  111.                           else
  112.                             if sprite 32 within 12 then
  113.                               set the text of member "StageText" to "Every issue of Computer Music will carry a full 25 stage walkthrough in essential software for making great music on your computer. The first issue's on UK sale from 3/9/98."
  114.                               updateStage()
  115.                             else
  116.                               if sprite 33 within 12 then
  117.                                 set the text of member "StageText" to "Every issue of Computer Music will carry a full 25 stage walkthrough in essential software for making great music on your computer. The first issue's on UK sale from 3/9/98."
  118.                                 updateStage()
  119.                               else
  120.                                 if sprite 34 within 12 then
  121.                                   set the text of member "StageText" to "Every issue of Computer Music will carry a full 25 stage walkthrough in essential software for making great music on your computer. The first issue's on UK sale from 3/9/98."
  122.                                   updateStage()
  123.                                 else
  124.                                   if sprite 35 within 12 then
  125.                                     set the text of member "StageText" to "Every issue of Computer Music will carry a full 25 stage walkthrough in essential software for making great music on your computer. The first issue's on UK sale from 3/9/98."
  126.                                     updateStage()
  127.                                   else
  128.                                     if sprite 36 within 12 then
  129.                                       set the text of member "StageText" to "Every issue of Computer Music will carry a full 25 stage walkthrough in essential software for making great music on your computer. The first issue's on UK sale from 3/9/98."
  130.                                       updateStage()
  131.                                     else
  132.                                       if sprite 37 within 12 then
  133.                                         set the text of member "StageText" to "Every issue of Computer Music will carry a full 25 stage walkthrough in essential software for making great music on your computer. The first issue's on UK sale from 3/9/98."
  134.                                         updateStage()
  135.                                       else
  136.                                         if sprite 38 within 12 then
  137.                                           set the text of member "StageText" to "Every issue of Computer Music will carry a full 25 stage walkthrough in essential software for making great music on your computer. The first issue's on UK sale from 3/9/98."
  138.                                           updateStage()
  139.                                         else
  140.                                           if sprite 39 within 12 then
  141.                                             set the text of member "StageText" to "Every issue of Computer Music will carry a full 25 stage walkthrough in essential software for making great music on your computer. The first issue's on UK sale from 3/9/98."
  142.                                             updateStage()
  143.                                           else
  144.                                             if sprite 40 within 12 then
  145.                                               set the text of member "StageText" to "Every issue of Computer Music will carry a full 25 stage walkthrough in essential software for making great music on your computer. The first issue's on UK sale from 3/9/98."
  146.                                               updateStage()
  147.                                             else
  148.                                               if sprite 41 within 12 then
  149.                                                 set the text of member "StageText" to "Every issue of Computer Music will carry a full 25 stage walkthrough in essential software for making great music on your computer. The first issue's on UK sale from 3/9/98."
  150.                                                 updateStage()
  151.                                               else
  152.                                                 if sprite 42 within 12 then
  153.                                                   set the text of member "StageText" to "Every issue of Computer Music will carry a full 25 stage walkthrough in essential software for making great music on your computer. The first issue's on UK sale from 3/9/98."
  154.                                                   updateStage()
  155.                                                 else
  156.                                                   if sprite 43 within 12 then
  157.                                                     set the text of member "StageText" to "Every issue of Computer Music will carry a full 25 stage walkthrough in essential software for making great music on your computer. The first issue's on UK sale from 3/9/98."
  158.                                                     updateStage()
  159.                                                   else
  160.                                                     if sprite 44 within 12 then
  161.                                                       set the text of member "StageText" to "Every issue of Computer Music will carry a full 25 stage walkthrough in essential software for making great music on your computer. The first issue's on UK sale from 3/9/98."
  162.                                                       updateStage()
  163.                                                     else
  164.                                                       set the text of member "StageText" to "--"
  165.                                                       puppetSound(1, 0)
  166.                                                     end if
  167.                                                   end if
  168.                                                 end if
  169.                                               end if
  170.                                             end if
  171.                                           end if
  172.                                         end if
  173.                                       end if
  174.                                     end if
  175.                                   end if
  176.                                 end if
  177.                               end if
  178.                             end if
  179.                           end if
  180.                         end if
  181.                       end if
  182.                     end if
  183.                   end if
  184.                 end if
  185.               end if
  186.             end if
  187.           end if
  188.         end if
  189.       end if
  190.     end if
  191.   end if
  192.   setTheVolumePlease()
  193. end
  194.  
  195. on stopMovie
  196.   puppetSound(1, 0)
  197.   puppetSound(0)
  198. end
  199.